#include <bits/stdc++.h>
#define fi first
#define se second
using namespace std;
const int N=5e5+1;
int n,k,m,l,p,cnt,cnt2,Ans,a[N],c[N],d[N],e[N],ans[N];
pair<int,int> b[N],b2[N];
vector<int> v;
int main()
{
	freopen("sub.in","r",stdin);
	freopen("sub.out","w",stdout);
	ios::sync_with_stdio(0);
	cin.tie(0);
	cin>>n>>k;
	for(int i=1;i<=n;i++)
	{
		cin>>a[i];
		b[i]={a[i],i};
	}
	sort(b+1,b+n+1);
	if(b[1].fi==b[k].fi)
	{
		cout<<2*b[k].fi;
		return 0;
	}
	for(int i=1;i<=n;i++)	if(a[i]<=b[k].fi)	c[++m]=a[i];
	for(int i=1;i<=k;i++)	if(b[i].fi==b[k].fi)	cnt++;
	for(int i=1;i<=m;i++)	if(c[i]==b[k].fi&&c[(i==1)?m:(i-1)]!=b[k].fi)	cnt2++;
	if(cnt>cnt2)
	{
		cout<<2*b[k].fi;
		return 0;
	}
	for(int i=1;i<=m;i++)	if(c[i]!=b[k].fi||(c[i]==b[k].fi&&c[(i==1)?m:(i-1)]!=b[k].fi))	d[++l]=c[i];
	for(int i=1;i<=l;i++)
	{
		int pre=d[(i==1)?l:(i-1)],nxt=d[(i==l)?1:(i+1)];
		if(d[i]==b[k].fi)	b2[++p]={max(pre,nxt),i};
		else	ans[i]=1;
	}
	sort(b2+1,b2+p+1);
	for(int i=1;i<=cnt;i++)	ans[b2[i].se]=1;
	for(int i=1;i<=l;i++)	if(ans[i])	v.push_back(d[i]);
	for(int i=0;i<v.size();i++)	Ans=max(Ans,v[i]+v[(i+1)%v.size()]);
	cout<<Ans;
	return 0;
}
